assist: fix bug commiting just added file

diff --git a/Command/Assist.hs b/Command/Assist.hs
index aaa8ea03765723d5a690754729b9ab919218bde0..de26d6c87a5b368e53516e5bb2bfbadacab183c8 100644 (file)
--- a/Command/Assist.hs
+++ b/Command/Assist.hs
@@ -11,6 +11,7 @@ import Command
 import qualified Command.Sync
 import qualified Command.Add
 import Annex.CheckIgnore
+import qualified Annex.Queue
 
 cmd :: Command
 cmd = withAnnexOptions [jobsOption, backendOption] $
@@ -32,6 +33,8 @@ myseek o = startConcurrency transferStages $ do
                , Command.Add.checkGitIgnoreOption = CheckGitIgnore (False)
                , Command.Add.dryRunOption = DryRun False
                }
-       
+       -- Flush added files to index so they will be committed.
+       Annex.Queue.flush
+
        Command.Sync.prepMerge
        Command.Sync.seek' o